home *** CD-ROM | disk | FTP | other *** search
/ Eros - Digital Erotica & Games / Eros - Digital Erotica & Games.iso / mac / EROS vol.1 / EROS vol.DXR / 00104.ls < prev    next >
Encoding:
Text File  |  1995-07-07  |  2.5 KB  |  93 lines
  1. on movWatch
  2.   global md1, md2, md3, md4, md5, md6, rantime, mp, ran
  3.   if the machineType = 256 then
  4.     set xxx to "md" & mp - 3 & EMPTY
  5.     set mdx to value(xxx)
  6.     if (the ticks - rantime) > 240 then
  7.       set mp to random(ran) + 3
  8.       set rantime to the ticks
  9.       set xxx to "md" & mp - 3 & EMPTY
  10.       set mdx to value(xxx)
  11.     end if
  12.     if the movieTime of sprite mp > mdx then
  13.       set the movieRate of sprite mp to -0.80000000000000004
  14.     end if
  15.     if the movieTime of sprite mp < 3 then
  16.       set the movieRate of sprite mp to 0.80000000000000004
  17.     end if
  18.     if the movieRate of sprite mp = 0 then
  19.       set the movieRate of sprite mp to 1
  20.     end if
  21.   else
  22.     if the movieTime of sprite 4 > md1 then
  23.       set the movieRate of sprite 4 to -1
  24.     end if
  25.     if the movieTime of sprite 4 < 3 then
  26.       set the movieRate of sprite 4 to 1
  27.     end if
  28.     if the movieRate of sprite 4 = 0 then
  29.       set the movieRate of sprite 4 to 1
  30.     end if
  31.     if md2 = 0 then
  32.       exit
  33.     end if
  34.     if the movieTime of sprite 5 > md2 then
  35.       set the movieRate of sprite 5 to -1
  36.     end if
  37.     if the movieTime of sprite 5 < 3 then
  38.       set the movieRate of sprite 5 to 1
  39.     end if
  40.     if the movieRate of sprite 5 = 0 then
  41.       set the movieRate of sprite 5 to 1
  42.     end if
  43.     if md3 = 0 then
  44.       exit
  45.     end if
  46.     if the movieTime of sprite 6 > md3 then
  47.       set the movieRate of sprite 6 to -1
  48.     end if
  49.     if the movieTime of sprite 6 < 3 then
  50.       set the movieRate of sprite 6 to 1
  51.     end if
  52.     if the movieRate of sprite 6 = 0 then
  53.       set the movieRate of sprite 6 to 1
  54.     end if
  55.     if md4 = 0 then
  56.       exit
  57.     end if
  58.     if the movieTime of sprite 7 > md4 then
  59.       set the movieRate of sprite 7 to -1
  60.     end if
  61.     if the movieTime of sprite 7 < 3 then
  62.       set the movieRate of sprite 7 to 1
  63.     end if
  64.     if the movieRate of sprite 7 = 0 then
  65.       set the movieRate of sprite 7 to 1
  66.     end if
  67.     if md5 = 0 then
  68.       exit
  69.     end if
  70.     if the movieTime of sprite 8 > md5 then
  71.       set the movieRate of sprite 8 to -1
  72.     end if
  73.     if the movieTime of sprite 8 < 3 then
  74.       set the movieRate of sprite 8 to 1
  75.     end if
  76.     if the movieRate of sprite 8 = 0 then
  77.       set the movieRate of sprite 8 to 1
  78.     end if
  79.     if md6 = 0 then
  80.       exit
  81.     end if
  82.     if the movieTime of sprite 9 > md6 then
  83.       set the movieRate of sprite 9 to -1
  84.     end if
  85.     if the movieTime of sprite 9 < 3 then
  86.       set the movieRate of sprite 9 to 1
  87.     end if
  88.     if the movieRate of sprite 9 = 0 then
  89.       set the movieRate of sprite 9 to 1
  90.     end if
  91.   end if
  92. end
  93.